home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / fgl110c.zip / 08-10.C < prev    next >
Text File  |  1992-01-31  |  585b  |  35 lines
  1. #include <fastgraf.h>
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4.  
  5. void main(void);
  6.  
  7. void main()
  8. {
  9.    int old_mode;
  10.  
  11.    if (fg_testmode(13,1) == 0) {
  12.       printf("This program requires a 320 ");
  13.       printf("x 200 EGA graphics mode.\n");
  14.       exit(1);
  15.       }
  16.  
  17.    old_mode = fg_getmode();
  18.    fg_setmode(13);
  19.  
  20.    fg_setcolor(9);
  21.    fg_locate(0,38);
  22.    fg_text("resize",6);
  23.    fg_waitkey();
  24.  
  25.    fg_erase();
  26.    fg_resize(640,200);
  27.    fg_setcolor(10);
  28.    fg_locate(0,38);
  29.    fg_text("resize",6);
  30.    fg_waitkey();
  31.  
  32.    fg_setmode(old_mode);
  33.    fg_reset();
  34. }
  35.